Form2 Resource Bar Form2 Panel3D1 SSPanel Frame3D1 SSFrame Top Of The Hour BigBen SSOption Big Ben BigBen SSOption BigBen SSOption Frame3D2 SSFrame Bottom Of The Hour SSOption SSOption HelpButton SSCommand OkButton SSCommand Command2_Click Help_Me Command1_Click Form1 Form2E Set_UpP Command3D1_Click Option3D1_Click' Index Value BigBen_Click Chimes_Click BigBen TopOfHour Chimes BottOfHour Form_Clickd Form_Load Command3D2_Click Form_Unload Cancel OkButton_Click ResultCode WritePrivateProfileString AppName KeyName NewValg FileName; NewPort ComPort NewTopOfHour NewBottOfHour{ Newbigben LngthOfRetStr UnloadY HelpButton_Click DING_Click DefltStr RetStr nSize GetPrivateProfileString NotOnTop SetWindowPos HWND_NOTOPMOST FLAGS Answer OnTop HWND_TOPMOST Command3D1_Click BigBen_Click BIGBEN Form_Load Take away the ON TOP feature in case user hasr positioned "bar" in front of where the form will appear Then reinstate the ON TOP feature in the Form_Unloadd proceedure. read .ini file in case user changedd it manually Does user want BigBen,DING, or nothing at top of hourK RESOURCE BAR TOPOFHOUR" BIGBEN RESOURCE.INI Does user want DING or nothing at bottom of hour RESOURCE BAR BOTTOFHOUR RESOURCE.INI BIGBEN OkButton_Click Form_Unload RESOURCE BAR BOTTOFHOUR RESOURCE.INI if Option changed, rewrite INI filec Error updating INI file! ERROR! now check top of the hour setting RESOURCE BAR TOPOFHOUR" RESOURCE.INI if Option changed, rewrite INI filem Error updating INI file! ERROR! DING_Click HelpButton_Click